home *** CD-ROM | disk | FTP | other *** search
/ Belgian Amiga Club - ADF Collection / BS1 part 41.zip / BS1 part 41 / Devpac 2.12 disk 2.adf / include.strip / exec / strings.i < prev    next >
Text File  |  1987-03-31  |  611b  |  33 lines
  1.     IFND EXEC_STRINGS_I
  2. EXEC_STRINGS_I SET 1
  3. EOS             EQU     0
  4. BELL            EQU     7
  5. LF              EQU     10
  6. CR              EQU     13
  7. BS              EQU     8
  8. DEL             EQU     $7F
  9. NL              EQU     LF
  10. STRING      MACRO
  11.      DC.B    \1
  12.      DC.B    0
  13.      CNOP    0,2
  14.      ENDM
  15. STRINGL     MACRO
  16.      DC.B    13,10
  17.      DC.B    \1
  18.      DC.B    0
  19.      CNOP    0,2
  20.      ENDM
  21. STRINGR     MACRO
  22.      DC.B    \1
  23.      DC.B    13,10,0
  24.      CNOP    0,2
  25.      ENDM
  26. STRINGLR    MACRO
  27.      DC.B    13,10
  28.      DC.B    \1
  29.      DC.B    13,10,0
  30.      CNOP    0,2
  31.      ENDM
  32.     ENDC !EXEC_STRINGS_I
  33.